home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: MegaDisc / MegaDisc 42 (1994-11)(MegaDisc Digital Publishing)(AU)(Disk 1 of 2)[WB].zip / MegaDisc 42 (1994-11)(MegaDisc Digital Publishing)(AU)(Disk 1 of 2)[WB].adf / Programming / C_Tutes_9&10 / program5.t < prev   
Text File  |  1994-12-12  |  452b  |  32 lines
  1.     .text
  2.     .globl    _main
  3. _main:
  4.     bra    L1
  5. L0:
  6. ;var    4    -4    _my_pointer
  7. ;var    4    -8    _dogs
  8.     lea    -8(a5),a0
  9.     move.l    a0,-4(a5)
  10.     move.l    #100,-8(a5)
  11.     move.l    -8(a5),-(sp)
  12.     move.l    #L3,-(sp)
  13.     jsr    _printf
  14.     add.w    #8,sp
  15.     move.l    -4(a5),a0
  16.     move.l    #50,(a0)
  17.     move.l    -8(a5),-(sp)
  18.     move.l    #L4,-(sp)
  19.     jsr    _printf
  20.     add.w    #8,sp
  21. L2:
  22.     unlk    a5
  23.     rts
  24. L1:
  25.     link    a5,#-8
  26.     bra    L0
  27.     .data
  28. L4:    .dc.b    $64,$6F,$67,$73,$3D,$25,$64,$A,$A
  29.     .dc.b    0
  30. L3:    .dc.b    $A,$64,$6F,$67,$73,$3D,$25,$64,$A
  31.     .dc.b    0
  32.